Assassins - Ultimate CD Games Collection 3/Assassins 3 - The Ultimate Games CD (1997)(Weird Science)[!][Amiga-CD32-CDTV].iso/arcade/wrath_of_gwendor/fi/mondat5

Text File | 1977-12-31 | 4KB | 7 lines

AU(I R1=5 J Q X Q:D D)H:L R0=2;L R5=0;L R3=0;L R4=96;L R8=X;L R7=260;L R6=-32;P;J LL:L X=X-16;L R1=1;A 0,(96,6)(97,6)(98,6)(97,6);I:P;L R2=1;L RG=Z(1500);I RG=136 J J;L X=X-2;L R4=A;L R8=X;I R9=2 J S;I X>R6 J I;J FR:L X=X+16;L R1=1;A 0,(99,6)(100,6)(101,6)(100,6);U:P;L R2=2;L RG=Z(1500);I RG=136 J J;L X=X+2;L R4=A;L R8=X;I R9=2 J S;I X<R7 J U;J CD:L R1=0;L R0=5;I R2=2 J E;L Y=Y+10;A 1,(28,4)(29,4)(30,4)(31,4);F R5=1 T 10;P;N R5;L Y=-100;J X;E:L R2=1;J DC:L R6=Z(60);J L;F:L R7=Z(128);L R7=R7+132;J RS:L R9=0;I R2=2 J G;I RX+10>X J V;M 30,0,60;P;J L;G:I RX-10>X J N;M 30,0,60;P;J RV:M -30,0,60;P;J L;N:M -30,0,60;P J R;X:L RG=Z(1500);I RG=136 J H;P;J XJ:I R2=1 J M;J Y;B:I Y<15 J F;L Y=Y-2;P;J B T:I Y<15 J C;L Y=Y-2;P;J TY:I RX<X J M L R2=2;A 0,(99,6)(100,6)(101,6)(100,6);M RX-X,RY-Y,50;P;J BM:I RX>X J Y L R2=1;A 0,(96,6)(97,6)(98,6)(97,6);M RX-X,RY-Y,50;P;J T
L R4=106;L R2=1;L R0=2;A 0,(106,24);A:L R6=Z(50);F R7=1 T R6;P;N R7;L R5=Z(240);L X=R5;B:L R8=X;L Y=Y-2;P;I Y<65 J C;J B;C:L R8=X;L Y=Y+2;P;I Y=120 J A;J C
AU(L R8=X;I R1=5 J D X D:D F)A:L R4=102;L R2=1;L X=360;F R5=1 T 7;A 0,(103,4);M -30,-25,15;M -10,-5,5;M -30,30,15;A 1,(102,6);P P P P P P P N R5;J JB:L R4=102;L R2=2;L X=-100;F R5=1 T 7;A 0,(105,4);M 30,-25,15;M 10,-5,5;M 30,30,15;A 1,(104,6);P P P P P P P N R5;J JJ:L X=400;A 1,(33,1);L Y=91;L R0=4;L R5=Z(1500);I R5=136 J C;P;J J;C:L R5=Z(250);I R5<125 J A;J BF:L R1=0;L R0=5;I R2=2 J G;A 1,(28,4)(29,4)(30,4)(31,4);F R3=1 T 10;P;N R3;J JG:A 1,(28,4)(29,4)(30,4)(31,4);F R3=1 T 10;P;N R3;J J
AU(I R1=5 J Q X Q:D D)H:L R0=2;L R5=0;L R3=0;L R4=107;L R8=X;L R7=260;L R6=-32;P;J LL:L X=X-48;L R1=1;A 0,(107,6)(108,6)(109,6)(108,6);I:P;L R2=1;L RG=Z(1500);I RG=136 J J;L X=X-2;L R4=A;L R8=X;I R9=2 J S;I X>R6 J I;J FR:L X=X+48;L R1=1;A 0,($8000+107,6)($8000+108,6)($8000+109,6)($8000+108,6);U:P;L R2=2;L RG=Z(1500);I RG=136 J J;L X=X+2;L R4=$C000+A;L R8=X;I R9=2 J S;I X<R7 J U;J CD:L R1=0;L R0=5;I R2=2 J E;L Y=Y+10;A 1,(28,4)(29,4)(30,4)(31,4);F R5=1 T 10;P;N R5;L Y=-100;J X;E:L X=X-32;L R2=1;J DC:L R6=Z(60);J L;F:L R7=Z(128);L R7=R7+132;J RS:L R9=0;I R2=2 J G;I RX+10>X J V;M 30,0,60;P;J L;G:I RX-10>X J N;M 30,0,60;P;J RV:M -30,0,60;P;J L;N:M -30,0,60;P J R;X:L RG=Z(1500);I RG=136 J H;P;J XJ:I R2=1 J M;J Y;B:I Y<15 J F;L Y=Y-2;P;J B T:I Y<15 J C;L Y=Y-2;P;J TY:I RX<X J M L R2=2;A 0,($8000+107,6)($8000+108,6)($8000+109,6)($8000+108,6);M RX-X,RY-Y,50;P;J BM:I RX>X J Y L R2=1;A 0,(107,6)(108,6)(109,6)(108,6);M RX-X,RY-Y,50;P;J T
AU(IR1=5DEIR9=2DJIR3>2DUX;);LX=-200LR0=6LR3=10A:LR0=3LY=111LR5=Z(1000)IR5>500JBIR5<500JCJAB:LR2=1LR4=1A0,(110,4)(111,4)(112,4)(111,4);FR5=1T80;LR6=RX+64;IX=R6JD;LX=X-1;LR8=X;P;IX<20JC;NR5;JA;C:LR2=2;LR4=6A0,(115,4)(114,4)(113,4)(114,4);FR5=1T80;LR6=RX-64;IX=R6JD;LX=X+1;LR8=X;P;IX>240JB;NR5;JAD:IR2=1JF;IR2=2JG;E:LR3=R3+1LR1=0;IR2=1JHIR2=2JIF:A0,(110,1);M-20,-30,10M-20,30,10;JAG:A0,(113,1);M20,-30,10M20,30,10,JAH:IY<111JRA0,(110,1);M10,-20,5M10,20,5;JA;I:IY<111JQA0,(113,1);M-10,-20,5M-10,20,5;JA;J:IR2=2JKIR2=1JLK:IY<108JMO:LR9=0A0,(115,10)(114,10)(113,10)(114,10);FR7=1T50;LX=X-1PNR7;JA;L:IY<111JN;P:LR9=0;A0,(112,10)(111,10)(110,10)(111,10);FR7=1T50;LX=X+1PNR7;JA;M:LY=Y+2LX=X-2PIY>111JOJMN:LY=Y+2LX=X+2PIY>111JPJNQ:LRY=YLY=Y-1LX=X-1IY<111JSJQR:LRY=YLY=Y-1LX=X+1IY<100JTJRS:LY=Y+2LX=X-2PIY>111JAJST:LY=Y+2LX=X+2PIY>111JAJTU:LR3=0;JV;V:LR0=5;A1,(28,6)(29,6)(30,6)(31,6);JW;W:PPPPPPPPPPPPPPPPPPPPPPPP;LR7=Z(1000)IR7<500JXIR7>500JY;X:LR5=Z(1000)PIR5=900JXLX=-56JAY:LR5=Z(1000)PIR5=900JYLX=290JA;
AU(LR8=X;IR1=5DJ;X;);A:LR0=6;LY=-50;LR5=Z(1000);IR5=8JB;JA;B:LX=Z(200);IX<70JA;IX>170JA;IRX<125JC;JD;C:LR2=1;LR4=116;A0,(116,3)(117,3);M-10,70,15;P;JI;D:LR2=2;LR4=118;A0,(118,3)(119,3);M10,70,15;P;JI;F:P;MRX-X,RY-Y,18;LR5=Z(1000);IR5<500JG;IR5>500JH;G:P;M-100,-200,30;JA;H:P;M100,-200,30;JA;I:LR5=Z(1000);IR5<150JF;M-8,-8,10;P;M8,-8,10;P;M8,8,10;P;M-8,8,10;P;JI;J:LR1=0;LR0=5;A1,(28,5)(29,5)(30,5)(31,5);FR5=1T20;NR5;LR0=6;JA;P;